home *** CD-ROM | disk | FTP | other *** search
- object SimpForm: TSimpForm
- Left = 162
- Top = 221
- Width = 781
- Height = 219
- HorzScrollBar.Range = 1200
- VertScrollBar.Range = 2000
- AutoScroll = False
- Caption = 'SimpForm'
- Font.Color = clBlack
- Font.Height = -13
- Font.Name = 'Arial'
- Font.Style = []
- PixelsPerInch = 96
- TextHeight = 16
- object TitleBand: TQRBand
- Left = 0
- Top = 0
- Width = 1200
- Height = 73
- Align = alTop
- BandType = rbTitle
- Color = clWhite
- Font.Color = clBlack
- Font.Height = -13
- Font.Name = 'Arial'
- Font.Style = [fsBold]
- ForceNewPage = False
- Frame.Width = 0
- Ruler = qrrInchesHV
- object Image1: TImage
- Left = 12
- Top = 4
- Width = 69
- Height = 33
- Picture.Data = {<image000.bmp>}
- Stretch = True
- end
- object QRLabel1: TQRLabel
- Left = 96
- Top = 4
- width = 193
- height = 36
- Caption = 'QuickReport'
- AlignToBand = False
- Font.Color = 8404992
- Font.Height = -32
- Font.Name = 'Arial'
- Font.Style = [fsBold, fsItalic]
- end
- object QRLabel2: TQRLabel
- Left = 300
- Top = 20
- width = 61
- height = 16
- Caption = 'for Delphi'
- AlignToBand = False
- Font.Color = 8404992
- Font.Height = -13
- Font.Name = 'Arial'
- Font.Style = [fsBold, fsItalic]
- end
- object QRLabel3: TQRLabel
- Left = 540
- Top = 20
- width = 200
- height = 16
- Caption = 'Copyright (c) 1995 Allan Lochert'
- AlignToBand = False
- Font.Color = clBlack
- Font.Height = -13
- Font.Name = 'Arial'
- Font.Style = [fsBold, fsItalic]
- end
- object QRShape1: TQRShape
- Left = 8
- Top = 44
- width = 733
- Height = 5
- Brush.Color = clNavy
- Shape = qrsRectangle
- end
- object QRLabel4: TQRLabel
- Left = 12
- Top = 56
- width = 60
- height = 16
- Caption = 'Company'
- AlignToBand = False
- end
- object QRLabel5: TQRLabel
- Left = 240
- Top = 56
- width = 50
- height = 16
- Caption = 'Address'
- AlignToBand = False
- end
- object QRLabel6: TQRLabel
- Left = 436
- Top = 56
- width = 48
- height = 16
- Caption = 'Contact'
- AlignToBand = False
- end
- object QRLabel7: TQRLabel
- Left = 568
- Top = 56
- width = 41
- height = 16
- Caption = 'Phone'
- AlignToBand = False
- Font.Color = clBlack
- Font.Height = -13
- Font.Name = 'Arial'
- Font.Style = [fsBold]
- end
- object QRLabel8: TQRLabel
- Left = 660
- Top = 56
- width = 24
- height = 16
- Caption = 'Fax'
- AlignToBand = False
- Font.Color = clBlack
- Font.Height = -13
- Font.Name = 'Arial'
- Font.Style = [fsBold]
- end
- end
- object DetailBand: TQRBand
- Left = 0
- Top = 73
- Width = 1200
- Height = 24
- Align = alTop
- BandType = rbDetail
- Color = clWhite
- ForceNewPage = False
- Frame.Width = 0
- Ruler = qrrNone
- object QRDBText1: TQRDBText
- Left = 12
- Top = 4
- width = 213
- height = 17
- AutoSize = False
- DataSource = DataSource1
- DataField = 'Company'
- end
- object QRDBText2: TQRDBText
- Left = 440
- Top = 4
- width = 117
- height = 17
- AutoSize = False
- DataSource = DataSource1
- DataField = 'Contact'
- end
- object QRDBText3: TQRDBText
- Left = 568
- Top = 4
- width = 85
- height = 17
- AutoSize = False
- DataSource = DataSource1
- DataField = 'Phone'
- end
- object QRDBText4: TQRDBText
- Left = 660
- Top = 4
- width = 85
- height = 17
- AutoSize = False
- DataSource = DataSource1
- DataField = 'FAX'
- end
- object QRDBText5: TQRDBText
- Left = 240
- Top = 4
- width = 169
- height = 17
- AutoSize = False
- DataSource = DataSource1
- DataField = 'Addr1'
- end
- end
- object PageFooterBand: TQRBand
- Left = 0
- Top = 97
- Width = 1200
- Height = 24
- Align = alTop
- BandType = rbPageFooter
- Color = clWhite
- ForceNewPage = False
- Frame.Width = 0
- Ruler = qrrNone
- object QRSysData1: TQRSysData
- Left = 640
- Top = 4
- width = 89
- height = 17
- Alignment = taRightJustify
- AlignToBand = True
- AutoSize = False
- Data = qrsPageNumber
- Text = 'Page '
- end
- end
- object SimpRep: TQuickReport
- Columns = 1
- DataSource = DataSource1
- DisplayPrintDialog = False
- LeftMarginInches = 0
- LeftMarginMM = 0
- Orientation = poPortrait
- PrintOrder = qrColByCol
- ReportTitle = 'QuickReport Simple report demonstration'
- ReportType = qrStandard
- RestartData = True
- SQLCompatible = False
- TitleBeforeHeader = False
- Left = 4
- Top = 140
- end
- object Table1: TTable
- Active = True
- DatabaseName = 'DBDEMOS'
- TableName = 'CUSTOMER.DB'
- Left = 36
- Top = 140
- end
- object DataSource1: TDataSource
- DataSet = Table1
- Left = 68
- Top = 140
- end
- end
-